home *** CD-ROM | disk | FTP | other *** search
/ Dr. Windows 3 / dr win3.zip / dr win3 / VISUALBA / DFVB10.ZIP / DFRAMEVB.INC < prev    next >
Text File  |  1993-01-06  |  15KB  |  251 lines
  1. DECLARE SUB Back.Space (Row%, Col%, Num%)
  2. DECLARE SUB BOX.IT (TROW%, LCOL%, BROW%, RCOL%, BOXTYPE%, BOXFG%, BOXBG%, FILLFG%, FILLBG%, FILLCHAR%, SHADOW%, TITLE$, HFG%, HBG%)
  3. DECLARE SUB CLREOL (XPOS%, YPOS%, BGC%)
  4. DECLARE SUB CLRMOL (XPOS%, YPOS%, LENGTH%, BGC%)
  5. DECLARE SUB CLRSOL (XPOS%, YPOS%, BGC%)
  6. DECLARE SUB CLRSCRN (CLR%)
  7. DECLARE SUB DE.LAY (BYVAL Seconds AS INTEGER)
  8. DECLARE SUB DETECT.ANSI ()
  9. DECLARE SUB DIS.PLAY (MSG$, FGC%, BGC%, BLINK%, BELL%, XPOS%, YPOS%, NL%, CENTER%, Caps%)
  10. DECLARE SUB ENTER ()
  11. DECLARE SUB ERRORS (ERRNUM%, ERRLINE%)
  12. DECLARE SUB EXIT.DOOR (YN$)
  13. DECLARE SUB INITIALIZE ()
  14. DECLARE SUB IN.PUT (RLEN%, WAITTIME&, IFG%, IBG%, AutoCR%, Text$, X%, Y%, ShowIt%)
  15. DECLARE SUB KEYTIMER (KEYSTART&)
  16. DECLARE SUB LINES (SROW%, SCOL%, LENGTH%, Direction$, ENDS%, MID%, EFG%, EBG%, MFG%, MBG%)
  17. DECLARE SUB MAKE.BLT (HI.SCORE&)
  18. DECLARE SUB MAKE.BLT.CURRENT (HI.SCORE&)
  19. DECLARE SUB MORE ()
  20. DECLARE SUB MUSIC (TUNE$)
  21. DECLARE SUB OUT.PUT (LF%)
  22. DECLARE SUB SEND (MSG$, YN%, CLR%)
  23. DECLARE SUB SHOW.BLT (YN$)
  24.  
  25. DECLARE FUNCTION CheckShare2% ()
  26. DECLARE FUNCTION DriveSpace& (Drive$)
  27. DECLARE FUNCTION NameCase2$ (St$)
  28. DECLARE FUNCTION Sec2Time$ (Seconds&)
  29. DECLARE FUNCTION Time2Sec& (TimeSt$)
  30.  
  31. DECLARE SUB BigPrint (St$, PixelCh$, BYVAL Row%, BYVAL Column%, BYVAL Attr%)
  32. DECLARE SUB CalcAttr (BYVAL Fore%, BYVAL Back%, Attr%)
  33. DECLARE SUB CalcDate (StartDate$, Days&, Direction%, NewDate$, ErrCode%)
  34. DECLARE SUB CDROM (FirstDrive$, Drives%)
  35. DECLARE SUB CheckDate (MonthNr%, DayNr%, YearNr%, ErrCode%)
  36. DECLARE SUB CheckShare (ShareActive%)
  37. DECLARE SUB DateA2R (MonthNr%, DayNr%, YearNr%, RelDate&)
  38. DECLARE SUB DateN2S (MonthNr%, DayNr%, YearNr%, DateSt$)
  39. DECLARE SUB DateR2A (MonthNr%, DayNr%, YearNr%, RelDate&)
  40. DECLARE SUB DateS2N (MonthNr%, DayNr%, YearNr%, DateSt$)
  41. DECLARE SUB DelFile (FileName$, ErrCode%)
  42. DECLARE SUB DrvType (Drive$, Removeable%, Remote%, ErrCode%)
  43. DECLARE SUB Elapsed (TimeStart$, TimeStop$, ElapsedT$)
  44. DECLARE SUB EMSBuffer (Bytes%)
  45. DECLARE SUB EMSClose (BYVAL ArrayHandle%)
  46. DECLARE SUB EMSGet (BYVAL ArrayHandle%, ElementNr&, Value AS ANY)
  47. DECLARE SUB EMSOpen (Elements&, ElementType%, ArrayHandle%, ErrCode%)
  48. DECLARE SUB EMSPut (BYVAL ArrayHandle%, ElementNr&, Value AS ANY)
  49. DECLARE SUB EMSRest (ArrayState$)
  50. DECLARE SUB EMSSave (ArrayState$)
  51. DECLARE SUB EnhKbd (BYVAL Enable%)
  52. DECLARE SUB EuropeDate (DateSt$, FormatSt$, Result$, ErrCode%)
  53. DECLARE SUB FormatDate (DateSt$, FormatSt$, Result$, ErrCode%)
  54. DECLARE SUB Get4DosV (MajorV%, MinorV%)
  55. DECLARE SUB GetDOSv (MajorVersion%, MinorVersion%)
  56. DECLARE SUB GetDView (MajorV%, MinorV%)
  57. DECLARE SUB GetKbd (Insrt%, Caps%, Num%, ScrollLock%)
  58. DECLARE SUB GetKbd1 (LShift%, RShift%, Cntrl%, Alt%)
  59. DECLARE SUB GetLIMHandles (Handles%)
  60. DECLARE SUB GetLIMm (TotalPages%, FreePages%)
  61. DECLARE SUB GetLIMv (MajorVersionNum%, MinorVersionNum%)
  62. DECLARE SUB GetTView (Installed%)
  63. DECLARE SUB GetTVScreen (DSeg%, DOfs%)
  64. DECLARE SUB KbdType (EnhancedKbd%)
  65. DECLARE SUB LClose (BYVAL EMSHandle%)
  66. DECLARE SUB LGet (BYVAL EMSHandle%, BYVAL DSeg%, BYVAL DOfs%, BYVAL WORDS%)
  67. DECLARE SUB LOpen (BYVAL WORDS%, EMSHandle%, ErrCode%)
  68. DECLARE SUB LPut (BYVAL EMSHandle%, BYVAL DSeg%, BYVAL DOfs%, BYVAL WORDS%)
  69. DECLARE SUB LRotate (St$)
  70. DECLARE SUB Namecase (St$)
  71. DECLARE SUB Processor (CPU%)
  72. DECLARE SUB Retries (BYVAL Tries%, BYVAL RetryPauseLen%)
  73. DECLARE SUB Reverse (St$)
  74. DECLARE SUB RInstr (MainSt$, SubSt$, Posn%)
  75. DECLARE SUB SetError (BYVAL ErrorLevel%)
  76. DECLARE SUB SetKbd (BYVAL Insrt%, BYVAL Caps%, BYVAL Num%, BYVAL ScrollLock%)
  77. DECLARE SUB TInstr (St$, BYVAL ChrType%, Place%)
  78. DECLARE SUB UnCalcAttr (FG%, BG%, BYVAL Attr%)
  79. DECLARE SUB UpdTVScreen (DSeg%, DOfs%)
  80. DECLARE SUB WinCheck (MajorV%, MinorV%)
  81.  
  82. 'NOTE: The following variables are not universally available.
  83. '      Check DFRAMEX.DOC for variables available to each BBS system's file.
  84.  
  85. COMMON SHARED Active.Menu%              '0=Main,1=Msg,2=File,3=Sysop (WC 3.0+)
  86. COMMON SHARED Age$                      'WWIV
  87. COMMON SHARED Alias$                    'Caller's alias/handle
  88. COMMON SHARED AllowedBytes&             'Allowed BYTES from the PCB PWRD file.
  89. COMMON SHARED AlreadyConnected$         '"TRUE" or "FALSE"
  90. COMMON SHARED AnsiOn$                   '"TRUE" or "FALSE"
  91. COMMON SHARED AnsiSupport$              'Caller supports ANSI but in NG mode
  92. COMMON SHARED Auto.Recycle%             '0 = Return control to programmer on
  93.                                         'carrier loss. 1 = Automatic recyle
  94.                                         'and return to BBS (Default).
  95. COMMON SHARED Banked.Time%              'WildCat! v3.0+
  96. COMMON SHARED BaudConn$                 'Connect rate of caller or "LOCAL"
  97. COMMON SHARED BaudOpen$                 'Port opening BPS
  98. COMMON SHARED BaudRate$                 'Baud and parity for DORINFO
  99.                                         'Baud rate or 'KB' for WWIV
  100. COMMON SHARED BBSColor%                 'BBS default color code (1-15)
  101. COMMON SHARED BBSDir$                   'Spitfire's home directory
  102. COMMON SHARED BBSSys$                   'Name of the BBS
  103. COMMON SHARED BBSName$                  'WWIV
  104. COMMON SHARED BirthDate$                'Caller's date of birth
  105. COMMON SHARED BltPath$                  'Path of the high score bulletin.
  106. COMMON SHARED CallAlarm%                'Caller alarm status.     -1=ON, 0=OFF
  107. COMMON SHARED CallersLoc$               'Location of CALLERSx log
  108. COMMON SHARED CallSign$                 'WWIV
  109. COMMON SHARED ChatStatus$               'Chat mode status. "U" or "A"
  110. COMMON SHARED City$                     'Caller's city and state
  111. COMMON SHARED CNAMESLoc$                'Location of CNAMES
  112. COMMON SHARED Columns$                  'WWIV
  113. COMMON SHARED Command.Line$             'Y or N, WildCat! v3.0+
  114. COMMON SHARED Comport%                  'COM port number
  115. COMMON SHARED ConfReg$                  'Conference registration
  116. COMMON SHARED Console$                  '"LOCAL" or "REMOTE"
  117. COMMON SHARED Daily.Bytes.Alwd&         'Daily download max. K limit
  118. COMMON SHARED DailyDnldBytes&           'Bytes downloaded so far today.
  119. COMMON SHARED DataBits$                 '7 OR 8
  120. COMMON SHARED DataDir$                  'WWIV
  121. COMMON SHARED DeleteFlag%               '1 = delete this record, 0 = keep
  122. COMMON SHARED Display%                  'Local display status.    -1=ON, 0=OFF
  123. COMMON SHARED DLPerDay&                 'Number of downloads allowed per day
  124. COMMON SHARED DLToday&                  'Number of downloads made today
  125. COMMON SHARED Door.DL&                  'WildCat 3.0+ # files DL'ed in door
  126. COMMON SHARED Door.KB&                  'WildCat 3.0+ Total K DL'ed in door
  127. COMMON SHARED Door.Logoff$              'WildCat 3.0+ Y or N if user logged
  128.                                         'off from within the door
  129. COMMON SHARED DoorNumber$               '
  130. COMMON SHARED Doors.Opened%             'Number of Doors he has opened
  131. COMMON SHARED DorInfo13th$              '13th line for RBBS DORINFO
  132. COMMON SHARED Downloads&                'Number of downloads made
  133. COMMON SHARED ECC%                      'Error corrected connect.  1=YES, 0=NO
  134. COMMON SHARED EnterDoor$                'Time caller entered the door
  135. COMMON SHARED Event$                    'Event time (hh:mm)
  136. COMMON SHARED ExeName$                  'Name of .EXE (Programmer supplied)
  137. COMMON SHARED ExitFrom$                 'Conference exited BBS from
  138. COMMON SHARED Expert$                   'Expert mode - "Y" or "N"
  139. COMMON SHARED Expire$                   'Caller's expiration date
  140. COMMON SHARED ExpiredLevel&             'Expired Security level
  141. COMMON SHARED ExtraTime&                'Number of seconds gained since logon
  142. COMMON SHARED First$                    'Caller's first name
  143. COMMON SHARED FrontEnd$                 '"TRUE" or "FALSE" if booted from a
  144.                                         'front end program.
  145. COMMON SHARED GfilesDir$                'WWIV
  146. COMMON SHARED Gold$                     'WWIV
  147. COMMON SHARED Graphics%                 'Graphics mode status.    -1=ON, 0=OFF
  148. COMMON SHARED Hi.Ascii%                 '1 = Allow IN.PUT to accept ASCII
  149.